* src/callproc.c (encode_current_directory): Fix thinko in previous.

diff --git a/src/callproc.c b/src/callproc.c
index 488fae3644e1c7af1b4c8bb7fc76b346d1d1c735..73424daaa0c825c9ec8a8df6fc259f77bd128a68 100644 (file)
--- a/src/callproc.c
+++ b/src/callproc.c
@@ -157,7 +157,7 @@ encode_current_directory (void)
                       BVAR (current_buffer, directory));
 
   /* Remove "/:" from dir.  */
-  if (Fstring_match (build_string ("^/:"), dir, Qnil))
+  if (! NILP (Fstring_match (build_string ("^/:"), dir, Qnil)))
     dir = Fsubstring (dir, make_number (2), Qnil);
 
   RETURN_UNGCPRO (dir);